home *** CD-ROM | disk | FTP | other *** search
/ ASME's Mechanical Engine…ing Toolkit 1997 December / ASME's Mechanical Engineering Toolkit 1997 December.iso / c_lang / pccstdio.lzh / SRC.LZH / UNGETC.C < prev    next >
Encoding:
C/C++ Source or Header  |  1984-07-28  |  387 b   |  19 lines
  1. /*    ungetc.c - push character back into input stream.
  2.     (C) Copyright 1984 Gregory R. Mansfield - All Rights Reserved.
  3.     G. R. Mansfield.  84/07/26.
  4.     Ver 1.0-4726.
  5. */
  6.  
  7. #include <stdio.h>
  8.  
  9. ungetc(c, fp) /* push character back into input stream */
  10. char c;
  11. FILE *fp;
  12. {
  13.     if (fp->_flag & _READ && fp->_ptr != NULL) {
  14.         fp->_cnt++;
  15.         return(*--fp->_ptr = c);
  16.     }
  17.     return(EOF);
  18. }
  19.